home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr47
/
rxdoscmd.zip
/
RXDOSCIN.ASM
< prev
next >
Wrap
Assembly Source File
|
1993-06-06
|
6KB
|
150 lines
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; RxDOS Command Shell Data Structures and Definitions ;
;...............................................................;
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; Real Time Dos Data Structure Definitions ;
;- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
; ;
; Data Structure Definitions ;
; ;
; ;
; (c) Copyright 1990, 1992. Api Software and Mike Podanoffsky ;
; All Rights Reserved Worldwide. ;
; ;
; This product is protected under copyright laws and may not ;
; be reproduced in whole or in part, in any form or media, ;
; included but not limited to source listing, facimilie, data ;
; transmission, cd-rom, or floppy disk without the expressed ;
; written consent of the author. ;
; ;
; Licence for distribution in commercial use: ;
; ;
; Api Software ;
; 12 South Walker Street ;
; Lowell, MA 01851 ;
; 508/ 454-4961. ;
; ;
;...............................................................;
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; Switches ;
;...............................................................;
SWITCHENTRY struc
swChar db ?
swFlags dw ?
swMinValue dw ?
swMaxValue dw ?
swActualValue dw ?
SWITCHENTRY ends
SW_MINMAXVALUE equ 0001h
SW_LETTERCHOICE equ 0002h
SW_SWITCHSET equ 8000h
sizeSWITCHENTRY equ size SWITCHENTRY
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; Sprintf flags ;
;...............................................................;
SPRINTF_COMMADELIM equ 8000h
SPRINTF_LONGFLAG equ 4000h
SPRINTF_LEFTALIGN equ 2000h
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; Internal Int21 Emulation call ;
;...............................................................;
Int21 macro arg1, arg2
ifnb < arg2 >
if ( arg1 GT 00ffh )
mov ax, arg1 + arg2
else
mov ax, ( arg1 * 256 + arg2 )
endif
endif
ifb < arg2 >
if ( arg1 GT 00ffh )
mov ax, arg1
else
mov ah, arg1
endif
endif
int 21h ;** real DOS
endm
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; Internal Int2E Emulation call ;
;...............................................................;
Int2E macro
pushf
call _CommandParser
endm
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; Replace Macro ;
;...............................................................;
Translate macro c1, c2, goto
mov ah, c2
cmp al, c1
jz goto
endm
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; Define Date/Time Template ;
;...............................................................;
intldate macro country, template
dw country
db template
endm
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; For Argument List ;
;...............................................................;
FORARGS struc
forVarIdent dw ?
forVarLetter dw ?
forInArg dw ?
forInStartParen dw ?
FORARGS ends
_IN equ 0
_DO equ 1
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''';
; Expanded Filename ;
;...............................................................;
EXPANDEDNAME struc
expDrive db 2 dup(?)
expPath db 129 dup(?)
expFilename db 9 dup(?)
expExtension db 5 dup(?)
EXPANDEDNAME ends
sizeExpandedName equ size EXPANDEDNAME